home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Amiga Tools 2
/
Amiga Tools 2.iso
/
dfue
/
avmnfax
/
playall.rexx
< prev
next >
Wrap
OS/2 REXX Batch file
|
1995-03-09
|
541b
|
31 lines
/* this script shows how to play all entries in a mailbox */
parse upper arg mailbox .
if mailbox = '' then do
say 'Usage: playall mailboxdir'
exit
end
call addlib("rexxsupport.library", 0, -30, 0)
logrexxport = 'AVMLOGVIEW.' || mailbox
logviewrunning = show('p', logrexxport)
say 'Opening up' mailbox
address command 'run >nil: <nil: avm:logview' mailbox
if ~logviewrunning then do 5
call delay(100)
logviewrunning = show('p', logrexxport)
if logviewrunning then break
end
address value logrexxport
'selectall'
'play'